Profile of (eval 425)[Sub/Quote.pm:3]

Filename	(eval 425)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]
Statements	Executed 17 statements in 131µs
Eval Invoked At	/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm line 3
Sibling evals	1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16, 17, 18, 19, 20, 21, 22, 23, 24, 25, 26, 27, 28, 29, 30, 31, 32, 33, 34, 35, 36, 37, 38, 39, 40, 41, 42, 43, 44, 45, 46, 47, 48, 49, 50, 51, 52, 53, 54, 55, 56, 57, 58, 59, 60, 61, 62, 63, 64, 65, 66, 67, 68, 69, 70, 71, 72, 73, 74, 75, 76, 77, 78, 79, 80, 81, 82, 83, 84, 85, 86, 87, 88, 89, 90, 91, 92, 93, 94, 95, 96, 97, 98, 99, 100, 101, 102, 103, 104, 105, 106, 107, 108, 109, 110, 111, 112

Subroutines
Calls	P	F	Exclusive Time	Inclusive Time	Subroutine
1	1	1	11µs	78µs	Type::Tiny::::__ANON__[:16]Type::Tiny::__ANON__[:16]
1	1	1	5µs	5µs	Type::Tiny::::BEGIN@9.323Type::Tiny::BEGIN@9.323
1	1	1	4µs	10µs	Type::Tiny::::BEGIN@16.324Type::Tiny::BEGIN@16.324

Call graph for these subroutines as a Graphviz dot language file.

Line	State ments	Time on line	Calls	Time in subs	Code
1					{
2	2	1µs			my $_UNQUOTED = ${$_[1]->{"\$_UNQUOTED"}};
3	1	0s			my $_QUOTED = ${$_[1]->{"\$_QUOTED"}};
4					package Type::Tiny;
5					# spent 78µs (11+67) within Type::Tiny::__ANON__[(eval 425)[/Users/ether/.perlbrew/libs/36.0@std/lib/perl5/Sub/Quote.pm:3]:16] which was called: # once (11µs+67µs) by JSON::Schema::Modern::add_vocabulary at line 177 of Sub/Defer.pm $$_UNQUOTED = sub {
6					($_QUOTED,$_UNQUOTED) if 0;
7					# BEGIN quote_sub PRELUDE
8					package Type::Tiny;
9					# spent 5µs within Type::Tiny::BEGIN@9.323 which was called: # once (5µs+0s) by Sub::Quote::_clean_eval at line 14 BEGIN {
10	1	0s			$^H = 1762;
11	1	1µs			${^WARNING_BITS} = "UUUUUUUUUUUUUUUUUUUU";
12	1	2µs			%^H = (
13					);
14	1	14µs	1	5µs	} # spent 5µs making 1 call to Type::Tiny::BEGIN@9.323
15					# END quote_sub PRELUDE
16	10	110µs	5	83µs	# spent 10µs (4+6) within Type::Tiny::BEGIN@16.324 which was called: # once (4µs+6µs) by Sub::Quote::_clean_eval at line 16 do { no warnings "void"; package Type::Tiny; (((do { package Type::Tiny; defined($_[0]) and do { ref(\$_[0]) eq 'SCALAR' or ref(\(my $val = $_[0])) eq 'SCALAR' } }) && (do { local $_ = $_[0]; my $uri = Mojo::URL->new($_); $uri->is_abs && !defined $uri->fragment }))) or Type::Tiny::_failed_check(82, "__ANON__", $_[0], ); $_[0] }; }; # spent 62µs making 1 call to Mojo::URL::new # spent 10µs making 1 call to Type::Tiny::BEGIN@16.324 # spent 6µs making 1 call to warnings::unimport # spent 4µs making 1 call to Mojo::URL::is_abs # spent 1µs making 1 call to Mojo::URL::fragment
17					}
18	1	3µs			1;
19
20					;